Bembidion_Larvae Class Reference

The class describing the beetle larvae objects. More...

#include <bembidion_all.h>

Inheritance diagram for Bembidion_Larvae:

Public Member Functions
	Bembidion_Larvae (int x, int y, Landscape *L, Bembidion_Population_Manager *BPM)
	Larvae class constructor. More...
void	ReInit (int x, int y, Landscape *L, Bembidion_Population_Manager *BPM)
	ReInit for object pool. More...
virtual void	BeginStep ()
	Larvae class BeginStep code. More...
virtual void	Step ()
	Larvae Step code. More...
virtual void	KillThis ()
	Kill this larva. More...
Public Member Functions inherited from Bembidion_Base
	Bembidion_Base (int x, int y, Landscape *L, Bembidion_Population_Manager *BPM)
	Constructor. More...
void	ReInit (int x, int y, Landscape *L, Bembidion_Population_Manager *BPM)
	ReInit for object pool. More...
virtual void	EndStep ()
	EndStep - empty. More...
virtual void	st_Die ()
	Common state Die. More...
void	CopyMyself (int a_beetle)
	For experimental purposes. More...
void	CopyMyselfB (int a_beetle)
	For experimental purposes. More...
Public Member Functions inherited from TAnimal
unsigned	SupplyFarmOwnerRef ()
AnimalPosition	SupplyPosition ()
APoint	SupplyPoint ()
int	SupplyPolygonRef ()
int	Supply_m_Location_x ()
int	Supply_m_Location_y ()
virtual void	CopyMyself ()
void	SetX (int a_x)
void	SetY (int a_y)
	TAnimal (int x, int y, Landscape *L)
virtual void	ReinitialiseObject (int x, int y, Landscape *L)
	Used to re-use an object - must be implemented in descendent classes. More...
virtual int	WhatState ()
virtual void	Dying ()
void	CheckManagement (void)
void	CheckManagementXY (int x, int y)
Public Member Functions inherited from TALMaSSObject
int	GetCurrentStateNo ()
	Returns the current state number. More...
void	SetCurrentStateNo (int a_num)
	Sets the current state number. More...
bool	GetStepDone ()
	Returns the step done indicator flag. More...
void	SetStepDone (bool a_bool)
	Sets the step done indicator flag. More...
virtual void	ReinitialiseObject ()
	Used to re-use an object - must be implemented in descendent classes. More...
	TALMaSSObject ()
	The constructor for TALMaSSObject. More...
virtual	~TALMaSSObject ()
	The destructor for TALMaSSObject. More...
void	OnArrayBoundsError ()
	Used for debugging only, tests basic object properties. More...

Protected Member Functions
int	st_Develop ()
	Larvae state development. More...
void	st_Pupate ()
	Larvae state pupation. More...
virtual bool	DailyMortality ()
	Larvae non-temperature or density related mortality. More...
virtual bool	OnFarmEvent (FarmToDo event)
	Larvae reactions to management events. More...
bool	TempRelatedLarvalMortality (int temp2)
	Determine larval temperature related mortality. More...
Protected Member Functions inherited from TAnimal
void	CorrectWrapRound ()
	Corrects wrap around co-ordinate problems. More...

Protected Attributes
double	m_AgeDegrees
	Record larvae day degrees. More...
int	m_LarvalStage
	Current larval growth stage (1-3) More...
int	m_DayMade
Protected Attributes inherited from TAnimal
int	m_Location_x
int	m_Location_y
Landscape *	m_OurLandscape
Protected Attributes inherited from TALMaSSObject
int	m_CurrentStateNo
	The basic state number for all objects - '-1' indicates death. More...
bool	m_StepDone
	Indicates whether the iterative step code is done for this timestep. More...

Additional Inherited Members
Public Attributes inherited from Bembidion_Base
TTypesOfBeetleState	CurrentBState
	Current behavioural state. More...
Bembidion_Population_Manager *	m_OurPopulation
	Pointer to the population manager. More...

Detailed Description

The class describing the beetle larvae objects.

Constructor & Destructor Documentation

Bembidion_Larvae()

Bembidion_Larvae::Bembidion_Larvae	(	int	x,
		int	y,
		Landscape *	L,
		Bembidion_Population_Manager *	BPM
	)

Larvae class constructor.

                                         :
    Bembidion_Base( x, y, L, BPM ) {
    m_LarvalStage = 0;
    m_AgeDegrees = 0;
    m_DayMade = L->SupplyDayInYear();
}

References m_AgeDegrees, m_DayMade, m_LarvalStage, and Landscape::SupplyDayInYear().

Member Function Documentation

BeginStep()

void Bembidion_Larvae::BeginStep ( void  )

virtual

Larvae class BeginStep code.

Reimplemented from Bembidion_Base.

{
  CheckManagement();
  if (DailyMortality())CurrentBState=tobs_LDying;
}

References TAnimal::CheckManagement(), Bembidion_Base::CurrentBState, DailyMortality(), and tobs_LDying.

DailyMortality()

bool Bembidion_Larvae::DailyMortality ( )

protectedvirtual

Larvae non-temperature or density related mortality.

{
  if (g_rand_uni()<DailyLarvaeMort)
  {
      return true;
  }
  return false;
}

References DailyLarvaeMort, and g_rand_uni.

Referenced by BeginStep().

KillThis()

void Bembidion_Larvae::KillThis ( void  )

virtual

Kill this larva.

Reimplemented from TAnimal.

{
 CurrentBState=tobs_LDying;
}

References Bembidion_Base::CurrentBState, and tobs_LDying.

OnFarmEvent()

bool Bembidion_Larvae::OnFarmEvent ( FarmToDo  event )

protectedvirtual

Larvae reactions to management events.

Reimplemented from TAnimal.

{
 switch(event)
 {
 case  sleep_all_day:
  break;
 case  autumn_plough:
  if (g_rand_uni()<cfg_Larva_SoilCultivationMortality.value()) CurrentBState=tobs_LDying;
  break;
 case  stubble_plough: // assumed to be the same as for autumn plough
     if (g_rand_uni()<cfg_Larva_SoilCultivationMortality.value()) CurrentBState = tobs_LDying;
     break;
 case  stubble_cultivator_heavy: // assumed to be the same as for autumn plough
     if (g_rand_uni()<cfg_Larva_SoilCultivationMortality.value()) CurrentBState = tobs_LDying;
     break;
 case  heavy_cultivator_aggregate: // assumed to be the same as for autumn plough
     if (g_rand_uni()<cfg_Larva_SoilCultivationMortality.value()) CurrentBState = tobs_LDying;
     break;
 case  autumn_harrow:
     if (g_rand_uni()<cfg_Larva_SoilCultivationMortality.value()) CurrentBState = tobs_LDying;
     break;
 case  preseeding_cultivator: // assumed to be the same as for harrow
     if (g_rand_uni()<cfg_Larva_SoilCultivationMortality.value()) CurrentBState = tobs_LDying;
     break;
 case  preseeding_cultivator_sow: // assumed to be the same as for harrow
     if (g_rand_uni()<cfg_Larva_SoilCultivationMortality.value()) CurrentBState = tobs_LDying;
     break;
 case  autumn_roll:
  if (g_rand_uni()<cfg_Larva_SoilCultivationMortality.value()) CurrentBState=tobs_LDying;
  break;
 case  autumn_sow:
  if (g_rand_uni()<cfg_Larva_SoilCultivationMortality.value()) CurrentBState=tobs_LDying;
  break;
 case  winter_plough:
  if (g_rand_uni()<cfg_Larva_SoilCultivationMortality.value()) CurrentBState=tobs_LDying;
  break;
 case  deep_ploughing:
  if (g_rand_uni()<cfg_Larva_SoilCultivationMortality.value()) CurrentBState=tobs_LDying;
  break;
 case  spring_plough:
  if (g_rand_uni()<cfg_Larva_SoilCultivationMortality.value()) CurrentBState=tobs_LDying;
  break;
 case  spring_harrow:
  if (g_rand_uni()<cfg_Larva_SoilCultivationMortality.value()) CurrentBState=tobs_LDying;
  break;
 case  shallow_harrow:
     if (g_rand_uni()<cfg_Larva_SoilCultivationMortality.value()) CurrentBState = tobs_LDying;
     break;
 case  spring_roll:
  break;
 case  spring_sow:
  break;
 case  spring_sow_with_ferti:
     break;
 case  fp_npks:
     break;
 case  fp_npk:
     break;
 case  fp_pk:
     break;
 case  fp_liquidNH3:
     break;
 case  fp_slurry:
     break;
 case  fp_manganesesulphate:
     break;
 case  fp_ammoniumsulphate:
     break;
 case  fp_manure:
     break;
 case  fp_greenmanure:
     break;
 case  fp_sludge:
     break;
 case  fp_rsm:
     break;
 case  fp_calcium:
     break;
 case  fa_npks:
     break;
 case  fa_npk:
     break;
 case  fa_pk:
     break;
 case  fa_slurry:
     break;
 case  fa_ammoniumsulphate:
     break;
 case  fa_manganesesulphate:
     break;
 case  fa_manure:
     break;
 case  fa_greenmanure:
     break;
 case  fa_sludge:
     break;
 case  fa_rsm:
     break;
 case  fa_calcium:
     break;
case  herbicide_treat:
  break;
case  growth_regulator:
  break;
case  fungicide_treat:
  break;
case  insecticide_treat:
  if (g_rand_uni()<cfg_Larva_InsecticideApplication.value()) CurrentBState=tobs_LDying;
  break;
case  molluscicide:
  break;
case  row_cultivation:
  break;
case  strigling:
    //if (g_rand_uni()<cfg_BeetleStriglingMort.value()) CurrentBState=tobs_LDying;
break;
case  hilling_up:
  break;
case  water:
  break;
case  swathing:
  break;
case  harvest:
  break;
case  cattle_out:
  break;
case  cattle_out_low:
  break;
case  cut_to_hay:
  break;
case  cut_to_silage:
  break;
case  straw_chopping:
  break;
case  hay_turning:
  break;
case  hay_bailing:
  break;
case  flammebehandling:
  break;
case  stubble_harrowing:
  break;
case  autumn_or_spring_plough:
  if (g_rand_uni()<cfg_Larva_SoilCultivationMortality.value()) CurrentBState=tobs_LDying;
  break;
case  burn_straw_stubble:
  break;
case mow:
  break;
case cut_weeds:
  break;
case pigs_out:
  break;
case strigling_sow:
  if (g_rand_uni()<cfg_Larva_SoilCultivationMortality.value()) CurrentBState=tobs_LDying;
  break;
case strigling_hill:
    if (g_rand_uni()<cfg_Larva_SoilCultivationMortality.value()) CurrentBState = tobs_LDying;
    break;
case trial_insecticidetreat:
  if (random(1000)<cfg_PesticideTrialLarvaeTreatmentMort.value()) CurrentBState=tobs_LDying;
  break;
case trial_toxiccontrol:
  if (random(1000)<PesticideTrialLarvaeToxicMort) CurrentBState=tobs_LDying;
  break;
case trial_control:
case product_treat:
 break;
case glyphosate:
 break;
case syninsecticide_treat:
 if (random(1000)<cfg_PesticideTrialLarvaeTreatmentMort.value()) CurrentBState=tobs_LDying;
 break;
case biocide:
 break;
case  bed_forming:
    if (g_rand_uni()<cfg_Larva_SoilCultivationMortality.value()) CurrentBState = tobs_LDying;
    break;
case flower_cutting:
    break;
case  bulb_harvest:
    if (g_rand_uni()<cfg_Larva_SoilCultivationMortality.value()) CurrentBState = tobs_LDying;
    break;
case straw_covering:
    break;
case straw_removal:
    break;
default:
  m_OurLandscape->Warn("Bembidion Larvae - Unknown Treatment in Daily Mortality"
                                                                         ,NULL);
  exit(1);
  }
 // Must incorporate a test here in case the animal is dead - killing it twice
 // can be a bad idea
 if (CurrentBState==tobs_LDying) return true;
  else
 return false;
}

References autumn_harrow, autumn_or_spring_plough, autumn_plough, autumn_roll, autumn_sow, bed_forming, biocide, bulb_harvest, burn_straw_stubble, cattle_out, cattle_out_low, cfg_Larva_InsecticideApplication, cfg_Larva_SoilCultivationMortality, cfg_PesticideTrialLarvaeTreatmentMort, Bembidion_Base::CurrentBState, cut_to_hay, cut_to_silage, cut_weeds, deep_ploughing, fa_ammoniumsulphate, fa_calcium, fa_greenmanure, fa_manganesesulphate, fa_manure, fa_npk, fa_npks, fa_pk, fa_rsm, fa_sludge, fa_slurry, flammebehandling, flower_cutting, fp_ammoniumsulphate, fp_calcium, fp_greenmanure, fp_liquidNH3, fp_manganesesulphate, fp_manure, fp_npk, fp_npks, fp_pk, fp_rsm, fp_sludge, fp_slurry, fungicide_treat, g_rand_uni, glyphosate, growth_regulator, harvest, hay_bailing, hay_turning, heavy_cultivator_aggregate, herbicide_treat, hilling_up, insecticide_treat, TAnimal::m_OurLandscape, molluscicide, mow, PesticideTrialLarvaeToxicMort, pigs_out, preseeding_cultivator, preseeding_cultivator_sow, product_treat, random(), row_cultivation, shallow_harrow, sleep_all_day, spring_harrow, spring_plough, spring_roll, spring_sow, spring_sow_with_ferti, straw_chopping, straw_covering, straw_removal, strigling, strigling_hill, strigling_sow, stubble_cultivator_heavy, stubble_harrowing, stubble_plough, swathing, syninsecticide_treat, tobs_LDying, trial_control, trial_insecticidetreat, trial_toxiccontrol, CfgInt::value(), CfgFloat::value(), Landscape::Warn(), water, and winter_plough.

ReInit()

void Bembidion_Larvae::ReInit	(	int	x,
		int	y,
		Landscape *	L,
		Bembidion_Population_Manager *	BPM
	)

ReInit for object pool.

                                                                                                 {
    Bembidion_Base::ReInit( x, y, L, BPM );
    m_LarvalStage = 0;
    m_AgeDegrees = 0;
    m_DayMade = L->SupplyDayInYear();
}

References m_AgeDegrees, m_DayMade, m_LarvalStage, Bembidion_Base::ReInit(), and Landscape::SupplyDayInYear().

st_Develop()

int Bembidion_Larvae::st_Develop ( )

protected

Larvae state development.

Determines temperature related mortality. If the larvae survives this then a density-dependent mortality is applied. If the the larvae survives the second mortality then development occurs based on the temperature experienced since the day before. Development rate depends on the larval stage. The code is speeded by these calculations being carried out by the Bembidion_Population_Manager for all eggs, larvae and adults extant each day, hence only one calculation needs to be done for each life-stage instead of potentially millions.

{
   int temp2=(int) floor(m_OurLandscape->SupplyTemp()+0.5);
   if (TempRelatedLarvalMortality(temp2))
   {
     // To ensure that we don't influence anyone else clear the position
     m_OurPopulation->m_LarvaePosMap->ClearMapValue(m_Location_x,m_Location_y);
     return 2; // die
   }
   // Find out if there is any danger of using wrap round
   if ((m_Location_x==0)||(m_Location_y==0)||(m_Location_x>=
       m_OurPopulation->SimW-2)||(m_Location_y>=m_OurPopulation->SimH-2))
   {
     // No density dependent mortality at the edge (this is a fudge, but a small one with large landscapes)
   }
   else
   {
     // Do density dependent mortality based on the +/- 1 m in all directions.
     if (m_OurPopulation->m_LarvaePosMap->GetMapDensity(m_Location_x-1,m_Location_y-1,cfg_DDepRange.value())>=m_OurPopulation->LDDepMort0) {
       if (g_rand_uni()<m_OurPopulation->LDDepMort1)
       {
        // To ensure that we don't influence anyone else clear the position
        m_OurPopulation->m_LarvaePosMap->ClearMapValue(m_Location_x,m_Location_y);
        return 2; // die
       }
     }
   }
   // Still alive so now do the development bit
   if (m_OurPopulation->SupplyLDayDeg(m_LarvalStage, m_DayMade )>LDevelConst2[m_LarvalStage])
   {
     m_LarvalStage++; // turn into next larval stage
   }
   if (m_LarvalStage==3) return 1; // become a pupa
     else return 0; // carry on developing
}

References cfg_DDepRange, SimplePositionMap::ClearMapValue(), g_rand_uni, SimplePositionMap::GetMapDensity(), Bembidion_Population_Manager::LDDepMort0, Bembidion_Population_Manager::LDDepMort1, LDevelConst2, m_DayMade, Bembidion_Population_Manager::m_LarvaePosMap, m_LarvalStage, TAnimal::m_Location_x, TAnimal::m_Location_y, TAnimal::m_OurLandscape, Bembidion_Base::m_OurPopulation, Population_Manager::SimH, Population_Manager::SimW, Bembidion_Population_Manager::SupplyLDayDeg(), Landscape::SupplyTemp(), TempRelatedLarvalMortality(), and CfgInt::value().

Referenced by Step().

st_Pupate()

void Bembidion_Larvae::st_Pupate ( )

protected

Larvae state pupation.

{
   // Must clear the map position
   m_OurPopulation->m_LarvaePosMap->ClearMapValue(m_Location_x, m_Location_y);
   struct_Bembidion * BS;
   BS = new struct_Bembidion;
   BS->x   = m_Location_x;
   BS->y   = m_Location_y;
   BS->L   = m_OurLandscape;
   BS->BPM = m_OurPopulation;
   BS->DayDegrees=(int)m_AgeDegrees;
   // carry the extra degrees over to next stage
   m_OurPopulation->CreateObjects(2,this,NULL,BS,1);
   delete BS;
}

References struct_Bembidion::BPM, SimplePositionMap::ClearMapValue(), Bembidion_Population_Manager::CreateObjects(), struct_Bembidion::DayDegrees, struct_Bembidion::L, m_AgeDegrees, Bembidion_Population_Manager::m_LarvaePosMap, TAnimal::m_Location_x, TAnimal::m_Location_y, TAnimal::m_OurLandscape, Bembidion_Base::m_OurPopulation, struct_Bembidion::x, and struct_Bembidion::y.

Referenced by Step().

Step()

void Bembidion_Larvae::Step ( void  )

virtual

Larvae Step code.

Reimplemented from Bembidion_Base.

{
 if (m_StepDone || m_CurrentStateNo == -1) return;
 switch (CurrentBState)
 {
  case 0:    // Initial
   CurrentBState=tobs_LDeveloping;
   break;
  case tobs_LDeveloping: // Developing
   switch(st_Develop())
   {
   case 0:  // nothing
    m_StepDone = true;
    break;
   case 1:  // pupating
    CurrentBState=tobs_Pupating;
    break;
   case 2:  // die
    CurrentBState=tobs_LDying;
    break;
   }
   break;
  case tobs_Pupating:
   st_Pupate();
   m_CurrentStateNo=-1; //Destroys object
   CurrentBState=tobs_Destroy;
   m_StepDone=true;
   break;
  case tobs_LDying:
   // Remove itself from the position map
   m_OurPopulation->m_LarvaePosMap->ClearMapValue(m_Location_x, m_Location_y);
   st_Die();
   m_StepDone=true;
   break;
  default:
    m_OurLandscape->Warn("Bembidion Larvae - Unknown State",NULL);
    g_msg->Warn(WARN_BUG, "State attempted was: ", int(CurrentBState));
    exit(1);
  }
}

References SimplePositionMap::ClearMapValue(), Bembidion_Base::CurrentBState, g_msg, TALMaSSObject::m_CurrentStateNo, Bembidion_Population_Manager::m_LarvaePosMap, TAnimal::m_Location_x, TAnimal::m_Location_y, TAnimal::m_OurLandscape, Bembidion_Base::m_OurPopulation, TALMaSSObject::m_StepDone, st_Develop(), Bembidion_Base::st_Die(), st_Pupate(), tobs_Destroy, tobs_LDeveloping, tobs_LDying, tobs_Pupating, MapErrorMsg::Warn(), Landscape::Warn(), and WARN_BUG.

TempRelatedLarvalMortality()

bool Bembidion_Larvae::TempRelatedLarvalMortality ( int  temp2 )

inlineprotected

Determine larval temperature related mortality.

The idea here is that we calculate how long a larvae would expect to be at a temperature (based on today's temp) We also calculate the background mortality expected at that temperature then divide the total mortality by the number of days then apply that mortality today Problem is that we are dealing with percentages so this is not straight forward. The solution used here is to calculate a set of development and daily mort for 5 degree intervals then choose the closest.

{
    if (temp2<0) temp2=0; else if (temp2>25) temp2=25;
    temp2=(int)(floor((float)temp2+2.0)*0.2); // same as (temp2+2)/5
    // take a mortality test
    if (g_rand_uni()<(LarvalDailyMort[m_LarvalStage][temp2])) return true;// die
    else return false;
}

References g_rand_uni, LarvalDailyMort, and m_LarvalStage.

Referenced by st_Develop().

Member Data Documentation

m_AgeDegrees

double Bembidion_Larvae::m_AgeDegrees

protected

Record larvae day degrees.

Referenced by Bembidion_Larvae(), ReInit(), and st_Pupate().

m_DayMade

int Bembidion_Larvae::m_DayMade

protected

Records the day hatched for development calculations

Referenced by Bembidion_Larvae(), ReInit(), and st_Develop().

m_LarvalStage

int Bembidion_Larvae::m_LarvalStage

protected

Current larval growth stage (1-3)

Referenced by Bembidion_Larvae(), ReInit(), st_Develop(), and TempRelatedLarvalMortality().

---

The documentation for this class was generated from the following files:

• /builds/a1mass/almass_stable_oddox/Bembidion/bembidion_all.h
• /builds/a1mass/almass_stable_oddox/Bembidion/Bembidion_all.cpp